        For number As Double = 2 To 0 Step -0.25
            Debug.Write(number.ToString & " ")
        Next
        Debug.WriteLine("")
        ' Output: 2 1.75 1.5 1.25 1 0.75 0.5 0.25 0 